home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Night Owl 6
/
Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso
/
001a
/
pns51a.zip
/
COMMOPNS.MAC
< prev
next >
Wrap
Text File
|
1991-12-26
|
5KB
|
87 lines
────────────────────────────────────────────────────────────────────────────
* * * BEGINNING OF PNS MACROS
╔═════════════════════════════════════════════════════════════════════════════╗ pnsupproto
║ Della & Muegge Enterprises' ║
║ ┤ COMMOPNS Upload Menu ├ ║
║ ║
║ Hot Key Selection External Program ║
╟─────────────────────────────────────────────────────────────────────────────╢
║ Ctrl-F1 Zmodem batch DSZ.COM ║ {GOTO PNSz}
║ Ctrl-F2 Ymodem batch or Ymodem-G DSZ.COM ║ {GOTO PNSyb}
║ Ctrl-F3 MPt batch MPT.EXE ║ {GOTO PNSp}
║ Ctrl-F4 Xmodem-1K (old Ymodem) N/A (Internal) ║ {GOTO PNSxk}
║ Ctrl-F5 Xmodem N/A (Internal) ║ {GOTO PNSx}
║ Ctrl-F6 HS/Link batch HSLINK.EXE ║ {GOTO PNSh}
╟─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─╢ {:CPU} {MACRO pnsupproto}
║ Edit PNS Macros ║ {GOTO PNSEdit}
║ Register PNS ║ {GOTO PNSRegister}
║ Macros -> ║ ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
╚═════════════════════════════════════════════════════════════════════════════╝
COMMOPNS is Shareware. Print out REGISTER.FRM for information on how to pay.
____
/ o \/| The Babble Underground Call for the latest versions of
|___, | (707) 575-0636 {COMMO}, COMMOPNS, and other {COMMO}
\____/\| USRobotics Dual Standard Utilities.
──────────────────────────────────────────────────────────────────────────── {:PNSEdit} {MACRO PNS Edit}
[E] to Edit
─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
ZMODEM BAT {:pnszup} * Auto Zmodem Upload, add "aut=pnszup,^xB01" to COMMO.SET
{:PNSz} * Label menu GOTOs
{:CF1} * HotKey (Control-F1)
{CALL PNS} * execute COMMOPNS
{EXEC-AW DSZ port %_port sz @%pnsf} * Protocol Driver
{GOTO PNSDone} * All done clean/up exit
YMODEM BAT {:PNSyb} {:CF2} {CALL PNS} {EXEC-AW DSZ port %_port sb -k @%pnsf} {GOTO PNSDone}
MPT {:PNSp} {:CF3} {CALL PNS} {EXEC-AW MPT P%p s @%pnsf} {GOTO PNSDone}
XMODEM 1K {:PNSxk} {:CF4} {CALL PNS} {CALL PNSGetName} {SXMO-KAW %PNSUpf} {GOTO PNSDone}
XMODEM CRC {:PNSx} {:CF5} {CALL PNS} {CALL PNSGetName} {SXMO-AW %PNSUpf} {GOTO PNSDone}
HSLINK BAT {:PNSh} {:CF6} {CALL PNS1} {exec HSLINK -p%_por @%pnsf} {GOTO PNSDone}
─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─
* The program COMMOPNS.EXE, DSZ.COM(or DSZ.EXE), and MPT.EXE must be in your *
* DOS PATH. The '@' and drive specifier MUST be included, OR DSZ won't work.*
─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ ─ PNS Filename Setup
{:PNS1} {SETV pns_hslink,true}
{:PNS} {SETV pnsf,C:\FILE.LST}
^^^^^^^^^^^
Configurable, file to put tagged file list.
{EXEC COMMOPNS %pnsf -ON -D%uldir -S%_speed}
* The -ON Sort files by filename.
* The -D option to specify in which directory to start.
* The -S option to specify the bps rate.
{COMP pns_hslink,true} {IFCO PNSReturn}
{IFEX %pnsf,,PNSD}
{:PNSReturn}
{SETV pns_hslink}
{RETURN}
{:PNSGetName} * For internal Xmodem protocols
{ROPEN %pnsf,PNSG}
{READ %PNSUpf}
{RCLOSE}
{:PNSG} {RETURN}
{:PNSDone}
{EXEC ERASE %pnsf}
{:PNSD} {SETV pnsf}
{SETV PNSUpf}
{}
{:PNSRegister}
{SPOC N} {CLEAR} {DISP 2,1,6a,COMMOPNS Registration}
{DISP 4,1,07,Use underlines instead of spaces in your name. (e.g. Jane_Doe)}
{DISP 5,1,07,Registration Name: } {GETS PNSname,30,PNSR20}
{DISP 6,1,07,Serial Number: } {GETS PNSserial,4,PNSR20}
{DISP 7,1,07,Activation Code: } {GETS PNScode,5,PNSR20}
{EXEC-W COMMOPNS -R%PNSserial %PNScode %PNSname}
{SETV PNSSerial} {SETV PNScode} {SETV PNSname}
{:PNSR20}
{CLEAR}
{MACRO}
* * * END OF PNS MACROS
────────────────────────────────────────────────────────────────────────────